home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 62 / Quick PC 62.iso / I386 / IIS5_01.CAB / IIS_BrowserCap_VBScript.asp < prev    next >
Encoding:
Text File  |  1998-10-16  |  3.0 KB  |  171 lines
  1. <% @ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <% Response.Buffer=TRue %>
  4. <% Response.Expires=-1 %>
  5.  
  6. <!--METADATA TYPE="Cookie" NAME="BrowsCap" SRC="clientCap.htm"-->
  7.  
  8. <!*************************
  9. This sample is provided for educational purposes only. It is not intended to be 
  10. used in a production environment, has not been tested in a production environment, 
  11. and Microsoft will not provide technical support for it. 
  12. *************************>
  13.  
  14.  
  15.  
  16. <HTML>
  17.   <HEAD>
  18.         <TITLE>Using the Browser Capabilities Component</TITLE>
  19.   </HEAD>
  20.   <BODY>
  21.  
  22.     <H2>Using the Browser Capabilities Component</H2>      
  23.     <HR SIZE="1" COLOR="#000000">
  24.  
  25.     <%
  26.       Dim  objBrowsCap
  27.       Set  objBrowsCap = Server.CreateObject("MSWC.BrowserType")
  28.     %>
  29.  
  30.     <TABLE border>
  31.       <TR>
  32.       <TH>Cap Name</TH> 
  33.       <TH>Value</TH>
  34.       </TR>
  35.       
  36.       <TR>
  37.       <TD>browser</TD>
  38.       <TD> <% = objBrowsCap.browser %></TD>
  39.       </TR>
  40.         
  41.       <TR>
  42.       <TD>version</TD>
  43.       <TD> <% = objBrowsCap.version %></TD>
  44.       </TR>
  45.       
  46.       <TR>
  47.       <TD>cookies</TD>
  48.       <TD> <% = objBrowsCap.cookies %></TD>
  49.       </TR>
  50.       
  51.       <TR><TD>javaapplets</TD>
  52.       <TD><% = objBrowsCap.javaapplets %></TD>
  53.       </TR>
  54.       
  55.       <TR>
  56.       <TD>VBScript</TD>
  57.       <TD><% = objBrowsCap.VBScript %></TD>
  58.       </TR>
  59.       
  60.       <TR>
  61.       <TD>JavaScript</TD>
  62.       <TD><%=objBrowsCap.JavaScript%></TD>
  63.       </TR>
  64.         
  65.       <TR>
  66.       <TD>platform</TD>
  67.       <TD><% = objBrowsCap.platform %></TD>
  68.       </TR>
  69.         
  70.         
  71.       <% If objBrowsCap.browser = "IE" and objBrowsCap.version >4 then %>
  72.         <TR>
  73.         <TD COLSPAN=2> <strong>New Feature for IE5 </strong></TD>
  74.         </TR>
  75.         
  76.         <TR>
  77.         <TD>horizontal resolution</TD>
  78.         <TD><% = objBrowsCap.width %></TD>
  79.         </TR>
  80.         
  81.         <TR>
  82.         <TD>vertical resolution</TD>
  83.         <TD><% = objBrowsCap.height %></TD>
  84.         </TR>
  85.         
  86.         <TR>
  87.         <TD>availHeight</TD>
  88.         <TD><% = objBrowsCap.availHeight %></TD>
  89.         </TR>
  90.           
  91.         <TR>
  92.         <TD>availWidth</TD>
  93.         <TD><% = objBrowsCap.availWidth %></TD>
  94.         </TR>
  95.  
  96.         <TR>
  97.         <TD>Buffer Depth</TD>
  98.         <TD><% = objBrowsCap.bufferDepth %></TD>
  99.         </TR>
  100.         
  101.         <TR>
  102.         <TD>Color Depth</TD>
  103.         <TD><% = objBrowsCap.colorDepth %></TD>
  104.         </TR>
  105.         
  106.         <TR>
  107.         <TD>Java enabled ?</TD>
  108.         <TD><% = objBrowsCap.javaEnabled %></TD>
  109.         </TR>
  110.  
  111.         <TR>
  112.         <TD>cpu Class</TD>
  113.         <TD><% = objBrowsCap.cpuClass %></TD>
  114.         </TR>
  115.  
  116.         <TR>
  117.         <TD>system Language</TD>
  118.         <TD><% = objBrowsCap.systemLanguage %></TD>
  119.         </TR>
  120.         
  121.         <TR>
  122.         <TD>user Language</TD>
  123.         <TD><% = objBrowsCap.userLanguage %></TD>
  124.         </TR>
  125.         
  126.  
  127.         <TR>
  128.         <TD>connectionType (lan, modem, offline)</TD>
  129.         <TD><% = objBrowsCap.connectionType %></TD>
  130.         </TR>
  131.  
  132.         <TR>
  133.         <TD>Is Java installed ?</TD>
  134.         <TD><% = objBrowsCap.Java%></TD>
  135.         </TR>
  136.         
  137.         <TR>
  138.         <TD>MSJava version</TD>
  139.         <TD><% = objBrowsCap.javaVersion%></TD>
  140.         </TR>
  141.         
  142.         <TR>
  143.         <TD>Is MSJava version equal to "5,0,3016,0" ?</TD>
  144.         <TD><% = objBrowsCap.compVersion%></TD>
  145.         </TR>
  146.     <% End if %>
  147.     
  148.     </TABLE>
  149.   
  150.   </BODY>
  151. </HTML>
  152.  
  153.  
  154.  
  155.  
  156.  
  157.  
  158.  
  159.  
  160.  
  161.  
  162.  
  163.  
  164.  
  165.  
  166.  
  167.  
  168.  
  169.  
  170.  
  171.